home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / devastation1.exe / Devastation / aliases.ini next >
Encoding:
INI File  |  1997-02-16  |  6.8 KB  |  204 lines
  1. [Aliases]
  2. n0=/op /mode # +ooo $$1 $2 $3
  3. n1=/dop /mode # -ooo $$1 $2 $3
  4. n2=/j /join #$$1
  5. n3=/p /part #
  6. n4=/n /names #$$1
  7. n5=/w /whois $$1
  8. n6=/k /kick # $$1
  9. n7=/q /query $$1
  10. n8=/hop /part # | /join #$$1
  11. n9=/send /dcc send $1 $2
  12. n10=/chat /dcc chat $1
  13. n11=/ping /ctcp $$1 ping
  14. n12=/e {  
  15. n13=  %text = $replace(*1,a,Γ)
  16. n14=  %text = $replace(%text,A,├)
  17. n15=  %text = $replace(%text,b,▀)
  18. n16=  %text = $replace(%text,ae,µ)
  19. n17=  %text = $replace(%text,c,ó)
  20. n18=  %text = $replace(%text,d,╨)
  21. n19=  %text = $replace(%text,e, δ)
  22. n20=  %text = $replace(%text,E, δ)
  23. n21=  %text = $replace(%text,i,φ)
  24. n22=  %text = $replace(%text,l,ú)
  25. n23=  %text = $replace(%text,n, ±)
  26. n24=  %text = $replace(%text,o,°)
  27. n25=  %text = $replace(%text,O,÷)
  28. n26=  %text = $replace(%text,w,\\')
  29. n27=  %text = $replace(%text,W,\\')
  30. n28=  %text = $replace(%text,f,f)
  31. n29=  %text = $replace(%text,F,f)
  32. n30=  %text = $replace(%text,cks,X)
  33. n31=  %text = $replace(%text,r,«)
  34. n32=  %text = $replace(%text,s,º )
  35. n33=  %text = $replace(%text,t,t)
  36. n34=  %text = $replace(%text,T,t)
  37. n35=  %text = $replace(%text,u,√)
  38. n36=  %text = $replace(%text,y, )
  39. n37=  %text = $replace(%text,?,┐)
  40. n38=  %text = $replace(%text,z,░z░)
  41. n39=  %text = $replace(%text,!,!)
  42. n40=  /say %text 
  43. n41=}  
  44. n42=/c {
  45. n43=  %text = $replace(*1,a,1a)
  46. n44=  %text = $replace(%text,A,2A)
  47. n45=  %text = $replace(%text,b,3b)  
  48. n46=  %text = $replace(%text,C,4C)
  49. n47=  %text = $replace(%text,d,5d)
  50. n48=  %text = $replace(%text,E,6E)
  51. n49=  %text = $replace(%text,f,7f)
  52. n50=  %text = $replace(%text,G,7G)
  53. n51=  %text = $replace(%text,h,9h)
  54. n52=  %text = $replace(%text,I,10I)
  55. n53=  %text = $replace(%text,j,11j)
  56. n54=  %text = $replace(%text,K,12K)
  57. n55=  %text = $replace(%text,l,13l)
  58. n56=  %text = $replace(%text,M,14M)
  59. n57=  %text = $replace(%text,n,15n)
  60. n58=  %text = $replace(%text,O,17O)
  61. n59=  %text = $replace(%text,p,18p)
  62. n60=  %text = $replace(%text,Q,19Q)
  63. n61=  %text = $replace(%text,r,20r)
  64. n62=  %text = $replace(%text,S,21S)
  65. n63=  %text = $replace(%text,t,22t)
  66. n64=  %text = $replace(%text,U,23U)
  67. n65=  %text = $replace(%text,v,23v)
  68. n66=  %text = $replace(%text,W,25W)
  69. n67=  %text = $replace(%text,x,26x)
  70. n68=  %text = $replace(%text,Y,27Y)
  71. n69=  %text = $replace(%text,z,28z)
  72. n70=  /say %text
  73. n71=}
  74. n72=/ec {  
  75. n73=  %text = $replace(*1,a,1Γ)
  76. n74=  %text = $replace(%text,A,2├)
  77. n75=  %text = $replace(%text,b,3▀)
  78. n76=  %text = $replace(%text,ae,4µ)
  79. n77=  %text = $replace(%text,c,5ó)
  80. n78=  %text = $replace(%text,d,6╨)
  81. n79=  %text = $replace(%text,e, 7δ)
  82. n80=  %text = $replace(%text,E, 7δ)
  83. n81=  %text = $replace(%text,i,9φ)
  84. n82=  %text = $replace(%text,l,10ú)
  85. n83=  %text = $replace(%text,n, 11±)
  86. n84=  %text = $replace(%text,o,12°)
  87. n85=  %text = $replace(%text,O,13÷)
  88. n86=  %text = $replace(%text,w,14\\')
  89. n87=  %text = $replace(%text,W,14\\')
  90. n88=  %text = $replace(%text,f,12f)
  91. n89=  %text = $replace(%text,F,12f)
  92. n90=  %text = $replace(%text,cks,15X)
  93. n91=  %text = $replace(%text,r,17«)
  94. n92=  %text = $replace(%text,s,18º )
  95. n93=  %text = $replace(%text,t,19t)
  96. n94=  %text = $replace(%text,T,19t)
  97. n95=  %text = $replace(%text,u,20√)
  98. n96=  %text = $replace(%text,y,21 )
  99. n97=  %text = $replace(%text,?,22┐)
  100. n98=  %text = $replace(%text,z,23░z░)
  101. n99=  %text = $replace(%text,!,23!)
  102. n100=  /say %text 
  103. n101=}  
  104. n102=/poll {
  105. n103=  /set %yes 0
  106. n104=  /set %no 0
  107. n105=  /set %totalvoters 0
  108. n106=  /set %question $$?="Enter the question:"  
  109. n107=  /enable #polls 
  110. n108=  /msg # 6The polls are open the question is 
  111. n109=  /msg # 12[ $+ %question $+ ]
  112. n110=  /msg #  4Type "!yes" for yes and "!no" for no 
  113. n111=  /msg # 2the polls will close in 2 mins. 
  114. n112=  .timer 1 60 /say 4Only 60 sec Left To Vote %popver (!yes or !no)
  115. n113=  .timer 1 120 /polloff
  116. n114=}
  117. n115=/polloff {
  118. n116=  /disable #polls
  119. n117=  /set %yes %yes * 100
  120. n118=  /set %yes %yes / %totalvoters
  121. n119=  /set %no %no * 100
  122. n120=  /set %no %no / %totalvoters
  123. n121=  /set %totalvoters %totalvoters * 100
  124. n122=  /set %totalvoters %totalvoters / $nick(0,#)
  125. n123=  /msg # 4voting is now closed..the votes are being counted..
  126. n124=  /msg # %totalvoters $+ % of the users on # voted on =========>[ $+ %question $+ ]<=========
  127. n125=  /msg # 12of that there were %yes $+ % YES's and %no $+ %  NO's
  128. n126=  if (%yes > %no) goto yes
  129. n127=  if (%yes < %no) goto no
  130. n128=  if (%yes = %no) goto equal
  131. n129=  :yes
  132. n130=  /msg # 4Majority voted YES! 
  133. n131=  goto end
  134. n132=  :no
  135. n133=  /msg # 4Majority voted NO! 
  136. n134=  goto end
  137. n135=  :equal
  138. n136=  /msg # 4It looks like we have a TIE!
  139. n137=  :end
  140. n138=  /unset %no 
  141. n139=  /unset %yes 
  142. n140=  /unset %notagain
  143. n141=  /unset %totalvoters
  144. n142=}
  145. n143=/clone {
  146. n144=  %t = 0
  147. n145=  :start
  148. n146=  inc %t 1
  149. n147=  if $nick(%t,#) == $null goto end
  150. n148=  if $address($nick(%t,#),2) == $null { whois $nick(%t,#) | set %whois 1 }
  151. n149=  goto start
  152. n150=  :end
  153. n151=  if %whois == $null clone_  | else .timer 1 10 clone
  154. n152=  unset %t %whois
  155. n153=}
  156. n154=/clone_ {
  157. n155=  set %u 0 | set %x 0 | unset %addlist
  158. n156=  :a
  159. n157=  inc %u 1 | set %v 0
  160. n158=  if $nick(%u,#) == $null goto out
  161. n159=  :b
  162. n160=  inc %v 1
  163. n161=  if $nick(%v,#) == $null goto a
  164. n162=  if $nick(%u,#) == $nick(%v,#) goto b
  165. n163=  if $address($nick(%u,#),2) == $address($nick(%v,#),2) {
  166. n164=    if $address($nick(%v,#),2) !isin %addlist { set %addlist %addlist $address($nick(%v,#),2) | inc %x 1 }
  167. n165=  }
  168. n166=  goto b
  169. n167=  :out
  170. n168=  %cloner # $chr(160) | %cloner # ü $+ CLONE report for # $+ ü
  171. n169=  if %x == 1 %cloner # ü $+ There is %x CLONE on # $+ ü | else %cloner # ü $+ There are %x CLONES on # $+ ü
  172. n170=  if %addlist == $null goto end
  173. n171=  set %u 0
  174. n172=  :c
  175. n173=  inc %u 1 | set %v 0 | set %w 1 | unset %clone | set %add $gettok(%addlist,%u,32)
  176. n174=  if %add == $null goto end
  177. n175=  :d
  178. n176=  inc %v 1
  179. n177=  if $nick(%v,#) == $null goto c
  180. n178=  if %add == $address($nick(%v,#),2) {
  181. n179=    if %clone == $null set %clone $nick(%v,#) | else set %clone %clone & $nick(%v,#)
  182. n180=  }
  183. n181=  inc %w 1
  184. n182=  if (($nick(%w,#) == $null) && (%clone != $null)) { 
  185. n183=    %cloner # ü $+ %clone $+ ü  ü $+ %add $+ ü
  186. n184=  }
  187. n185=  goto d
  188. n186=  :end
  189. n187=  %cloner # 12,1 /{}\4,1╨δvΓºtΓtφ°±12,1/{}\ | %cloner # $chr(160) | unset %u %v %w %x %addlist %add %clone
  190. n188=}
  191. n189=/onquit {
  192. n190=  set %echosplit $chan
  193. n191=  .timer750 1 30 /unset %split
  194. n192=  .timer751 1 30 /unset %splitlist
  195. n193=  if (($right(7,$parm1) == dal.net) && ($right(7,$parm2) == dal.net)) {
  196. n194=    set %split2 $token(1,46,$parm2)
  197. n195=    set %split $token(1,46,$parm1)
  198. n196=    if %split !isin %splitlist {
  199. n197=      set %splitlist %splitlist %split
  200. n198=      echo 2 %echosplit Attention there is a netpslit at  $+ %split $+ / $+ %split2 $+   
  201. n199=    }
  202. n200=  }
  203. n201=}
  204.